home *** CD-ROM | disk | FTP | other *** search
/ Amiga Game-Power / Amiga Game-Power.iso / power games ii / galactic worm / corewars / beispiele / mausefalleii < prev    next >
Text File  |  1994-05-20  |  678b  |  24 lines
  1. ; Mausefalle
  2. ; ----------
  3. ;
  4. knirps          MOV #0, -1
  5.                 JMP knirps
  6. num             DAT 1594
  7. falle           SPL *                   
  8.                 JMP falle               
  9. anzahl          DAT 797                
  10. offset          DAT 0
  11. grube           JMP -3
  12. start           SUB #10, offset      
  13.                 ADD #10, grube         
  14.                 MOV grube, @offset      
  15.                 DJN start, anzahl
  16.                 SPL knirps
  17. end             MOV #-7, anzahl
  18. kill            MOV #0, @anzahl
  19.                 SUB #5, anzahl
  20.                 DJN kill, num
  21.                 MOV #0, falle           
  22.                 MOV #1594, num
  23.                 JMP end   
  24.